home *** CD-ROM | disk | FTP | other *** search
- #define geta4 __builtin_geta4
- void geta4(void);
-
- #define TKCMD_TALK 1
- #define TKCMD_ABORT 2
- #define TKCMD_DATA 3
- #define TKCMD_CONFERENCE 4
- #define TKCMD_CONDATA 5
- #define TKCMD_CONEND 6
- #define TKCMD_CONLIST 7
- #define TKCMD_CLDATA 8
- #define TKCMD_CLEND 9
- #define TKCMD_MALIST 10
- #define TKCMD_STATUS 11
- #define TKCMD_PRIVATE 12
- #define TKCMD_CONCREATE 13
-
- struct c_worknode
- {
- struct Node cnode;
- UBYTE name[32];
- };
-
- struct c_membnode
- {
- struct Node cnode;
- UBYTE name[32];
- UBYTE alias[32];
- ULONG flags;
- };
-
- UWORD __chip waitPointer[] =
- {
- 0x0000,0x0000,0x0400,0x07c0,0x0000,0x07c0,0x0100,0x0380,0x0000,0x07e0,
- 0x07c0,0x1ff8,0x1ff0,0x3fec,0x3ff8,0x7ede,0x3ff8,0x7ebe,0x7ffc,0xff7f,
- 0x7efc,0xffff,0x7ffc,0xffff,0x3ff8,0x7ffe,0x3ff8,0x7ffe,0x1ff0,0x3ffc,
- 0x07c0,0x1ff8,0x0000,0x07e0,0x0000,0x0000
- };
-
- UBYTE conf_host[32],conf_name[32],alias[32];
- UBYTE machine_name[32],pri_msg[256];
- UBYTE Conf_Port_Name[32];
-
- struct Task *TKProc;
- ULONG TKSignalMask,TKCommand,Start_Count=0;
- ULONG GLB_Error=0;
- ULONG cycle_mode;
- struct Requester null_request;
- BOOL temp_request;
- struct Message Conf_Msg;
- struct Process *myproc;
-
- struct List c_worklist,c_memblist;
-
- struct Library *IntuitionBase,*GadToolsBase,*ServicesBase,*NIPCBase,*UtilityBase;
- struct Library *DOSBase;
- struct Library *SysBase;
- struct Library *IconBase;
-
- /*
- ** The following code is for the WorkBench "interface". Windows, gadgets,
- ** etc. Created with GadToolsBox v1.3
- */
-
- #define GD_Gadget00 0
- #define GD_Gadget10 1
- #define GD_Gadget20 2
- #define GD_Gadget30 3
- #define GD_Gadget40 4
- #define GD_Gadget50 5
- #define GD_Gadget60 6
- #define GD_Gadget70 7
- #define GD_Gadget80 8
- #define GD_Gadget90 9
- #define GD_Gadget100 10
- #define GD_Gadget110 11
-
-
- struct Screen *Scr = NULL;
- APTR VisualInfo = NULL;
- struct Window *Project0Wnd = NULL;
- struct Gadget *Project0GList = NULL;
- struct Gadget *Project0Gadgets[12];
- UWORD Project0Left = 0;
- UWORD Project0Top = 12;
- UWORD Project0Width = 574;
- UWORD Project0Height = 192;
- UBYTE *Project0Wdt = "Conference Work Window";
-
- UBYTE *Gadget900Labels[] = {
- (UBYTE *)"- Normal -",
- (UBYTE *)"- Hide -",
- (UBYTE *)"- Muffle -",
- (UBYTE *)"- Ignore -",
- NULL };
-
- struct TextAttr topaz8 = {
- ( STRPTR )"topaz.font", 8, 0x00, 0x00 };
-
- struct IntuiText Project0IText[] = {
- 2, 0, JAM1,378, 4, &topaz8, (UBYTE *)"Configuration", NULL };
-